
keep if sample==1

foreach v of global all_DV { 
	display in red "`v'"
	qui reg `v' i.treatment##i.time  $ControlsB if influence_workshop_request==0 , vce(cluster agency)
		est store `v'_CB
}

**##Panel A

esttab business_w5_CB comply_CB complete_CB open_request_CB extension_CB business_days_within_15_CB business_days_within_25_CB business_days_15_CB business_days_25_CB using "$Tables/Table_E5_a.tex", replace  label  b(%5.3f) se(%5.3f) star(* 0.10 ** 0.05 *** 0.01) mlabels("Business days" "Replied in time" "Complete answer" "Open request" "Extension was granted" "Replied within 15 bd" "Replied within 25 bd" "Replied in 15 bd" "Replied in 25 bd") refcat(1.treatment "\vspace{-6mm}", nolabel) stats(N r2,  labels(`"Observations"' `"R-squared"', prefix(\addlinespace[3pt])) fmt(%10.0fc %10.3fc 0 0) )  coeflabels($labels)   keep(1.treatment 1.time 1.treatment#1.time) order(1.treatment 1.time 1.treatment#1.time) nonumber nonote compress noomitted nobaselevels 


**##Panel B

foreach v of global all_DV { 
	display in red "`v'"
	qui reg `v' i.treatment##i.time  $ControlsB if influence_workshop_request==1 , vce(cluster agency)
		est store `v'_CB
}


#delimit ;
global Note_Table_E5 "
{\begin{minipage}{1.36\textwidth}
\small  
\vspace{0.2cm} 
\textit{Notes:} * p $math < $math 0.10, ** p $math < $math 0.05, *** p $math < $math 0.01. Standard errors clustered by agency are shown in parentheses. The dependent variable in the first column is the winsorized number of business days agencies took to respond (winsorized the 5\% highest values) and it only considers closed requests by November 27, 2019. Control variables include: month in which the agency received the request, the total number of requests received by the agency before the intervention (Jan 1, 2017 until Sept. 5, 2018), average percentage of pending requests (not past the deadline - Mean of \% Pending Pre) before the intervention, average percentage of late requests prior to the intervention (Mean of \% Backlog Pre), type of requester, serial requesters, topic of the request, total number of requests received by the agency on the date request \$ i \$ arrived, and ministry of the agency. 
 \end{minipage}
 }
";
#delimit cr

esttab business_w5_CB comply_CB complete_CB open_request_CB extension_CB business_days_within_15_CB business_days_within_25_CB business_days_15_CB business_days_25_CB using "$Tables/Table_E5_b.tex", replace  label  b(%5.3f) se(%5.3f) star(* 0.10 ** 0.05 *** 0.01) mlabels("Business days" "Replied in time" "Complete answer" "Open request" "Extension was granted" "Replied within 15 bd" "Replied within 25 bd" "Replied in 15 bd" "Replied in 25 bd") refcat(1.treatment "\vspace{-6mm}", nolabel) stats(N r2,  labels(`"Observations"' `"R-squared"', prefix(\addlinespace[3pt])) fmt(%10.0fc %10.3fc 0 0) )  coeflabels($labels)  addnote($Note_Table_E5)  keep(1.treatment 1.time 1.treatment#1.time) order(1.treatment 1.time 1.treatment#1.time) nonumber nonote compress noomitted nobaselevels 
